home *** CD-ROM | disk | FTP | other *** search
/ Comix Games / Comix Games.iso / waldo / waldo.exe / FINAL08.DXR / 00336.ls < prev    next >
Encoding:
Text File  |  1995-10-08  |  478 b   |  22 lines
  1. on exitFrame
  2.   set oldVol1 to the volume of sound 1
  3.   set oldVol2 to the volume of sound 2
  4.   repeat with x = 255 down to 0
  5.     if x < oldVol1 then
  6.       set the volume of sound 1 to x
  7.     end if
  8.     if x < oldVol2 then
  9.       set the volume of sound 2 to x
  10.     end if
  11.     updateStage()
  12.     set x to x - 5
  13.   end repeat
  14.   puppetSound(0)
  15.   sound stop 1
  16.   sound stop 2
  17.   updateStage()
  18.   set the volume of sound 1 to oldVol1
  19.   set the volume of sound 2 to oldVol2
  20.   updateStage()
  21. end
  22.